10 KEYOFF:COLOR13,1,1:CLS:X=5:Y=5:D=0:VI=5:VP=0:DEFINTR:RA=0:RB=0:R0=0:R1=0:R2=0:R3=0:FA=0:B=0:L=0:SCREEN1
20 GOSUB1310:GOSUB1390:GOSUB1340:GOSUB1390:GOSUB1450:GOSUB30:GOTO90
30 REM  press space 
40 A$="x":A$=INKEY$:IFA$<>" "THENGOTO40
50 RETURN
60 REM  LIMPIA SCROLL 
70 FORK=0TO23:PRINT:NEXTK
80 RETURN
90 REM  CLAVE 
100 GOSUB60:LOCATE8,7:PRINT"Introduce la":PRINT:PRINT"            ":PRINT"             W":PRINT"             ":PRINT:PRINT"     XWWWWWWWWWWWWWWWWWY":PRINT"     V                ?V"
110 PRINT"     ZWWWWWWWWWWWWWWWWW[":LOCATE6,14:INPUT RESP$
120 IF RESP$="yosoylamorsa  ?V" THEN PLAY"e9a5":LOCATE7,18:PRINT"Sigamos con ...":GOSUB30:ELSE PLAY"v12c9":CLS:GOTO100
130 REM  HUMPTY DUMPTY 
140 GOSUB60:COLOR15,1:LOCATE6,11:PRINT"I HUMPTY DUMPTY I":GOSUB30:GOSUB60:LOCATE0,0:PRINT"WQue cinturon tan bonito lle-va usted!":PRINT"HUMPTY DUMPTY miro con gesto de enfado.":PRINT"Creo que me he equivocado  penso Alicia.":PRINT
150 INPUT"Si no era un cinturon, que   crees que seria";RESP$:IFRESP$<>"corbata"THENGOSUB160:PRINT"\ No. Pista: un huevo tiene  cintura o cuello? :)":GOTO150:ELSEPLAY"e9a5":PRINT"B Correcto!":PRINT:GOTO210
160 REM  RESTA VIDA 
170 VI=VI-1:PLAY"c9":IFVI<1THENGOSUB60:GOTO180:ELSE RETURN
180 REM  DREAM OVER 
190 PRINT:PRINT:PRINT:PRINT"            ":PRINT"               ":PRINT"             ":PRINT"                 ":PRINT"              "
200 PRINT:PRINT"           O V E R":PRINT:PRINT:PRINT:PRINT:PRINT:PRINT:PRINT:PRINT:PLAY"v12bafbafagr5agrbafbafba3rgfre5re5rd1","v12cdcdcdcdr5cdrcdcdcdef3rbara6ra6ra1":GOSUB30:RUN
210 REM ------- seguimos ----------
220 PRINT"WDisculpe mi ignorancia, Sir.WEs una corbata y muy bonita!Ademas,me la regalaron el Reyy la Reina blancos...":PRINT"WMuy bonita, si.  _":PRINT"WPor mi No-Cumpleanos.":PRINT"WY eso que es?":PRINT"WUn regalo que te_dan cuando"
230 PRINT"no es tu cumpleanos, claro.  WPrefiero la celebracion nor-mal.":PRINT"-Que tonteria!._A ver,cuantosdias tiene un ano?":PRINT"W365 dias _":PRINT"WY cumpleanos,cuantos tienes?W1.":PRINT"WY si restamos 1 a 365 obte- nemos?":PRINT"W364,claro.
240 GOSUB30:PRINT"WMe gustaria Wdijo pensativo HUMPTY DUMPTYWverlo en papel.Alicia cogio su libro de no- tas y escribio la cuenta."
250 PRINT:PRINT"    365":PRINT"    - 1":PRINT"  WWWWWW":INPUT"  ";RESP$:IFRESP$<>"364"THENGOSUB160:GOTO250:ELSEPLAY"e9a5":PRINT
260 PRINT"HUMPTY DUMPTY cogio el libri-to y dijo:":PRINT"WParece correcto.":PRINT"WPero si lo tiene al reves.  WYa notaba yo algo raro. A   falta de un analisis mas pro-fundo,parece correcto, y nos muestra que hay 364 regalos"
270 PRINT"de No-Cumpleanos contra 1 de cumpleanos.Vamos,que te has  cubierto de gloria.":PRINT"WCubierto de gloria?":PRINT"WSignifica que mi argumenta- cion te ha vencido.":PRINT"WNo creo que signifique eso. WMis palabras significan lo"
280 PRINT"que quiero que signifiquen.  WLa cuestion es,como hace us-ted para que una palabra ten-ga tantos significados?":PRINT"WNo, la cuestion es saber    quien manda aqui,ellas o yo!":GOSUB30:PRINT"WYa que sabe usted tanto de"
290 PRINT"las palabras quizas pueda    ayudarme con las que aparecenen el poema Jabberwocky.     WUff,demasiado complejo para ti.":PRINT"WTambien me se La Morsa y el Carpintero.":PRINT"          _"
300 INPUT"Quien enseno este poema a    Alicia";RESP$:IFRESP$<>"Tweedledee"THENGOSUB160:PRINT"\ Incorrecto.":GOTO300:ELSEPLAY"e9a5":PRINT"B Buena memoria.":PRINT
310 PRINT"WVeo que te gusta la poesia. Pues es tu dia de suerte,puesyo recito como nadie.":PRINT"WNo se moleste, no es necesa-rio.":PRINT"WLa pieza que voy a recitar, fue escrita para divertirte.":PRINT
320 PRINT"(AYUDA A HUMPTY DUMPTY CON   LAS PALABRAS QUE FALTAN EN   EL POEMA)":PRINT:PRINT"En invierno,con los campos   cubiertos de _____,":PRINT"Canto esta cancion para tu   deleite.":PRINT
330 INPUT"Que palabra falta";RESP$:IFRESP$<>"nieve"THENGOSUB160:PRINT"\ No me gusta.":GOTO330:ELSEPLAY"e9a5":PRINT"B Buena eleccion.":PRINT
340 PRINT"En primavera,cuando crece la maleza,":PRINT"Te dire lo que se me pase porla ______.":PRINT
350 INPUT"Que palabra falta";RESP$:IFRESP$<>"cabeza"THENGOSUB160:PRINT"\ No me convence.":GOTO350:ELSEPLAY"e9a5":PRINT"B Perfecto!":PRINT
360 PRINT"En verano,cuando los dias no terminan,":PRINT"Quizas comprendas esta ____.":PRINT
370 INPUT"Que palabra falta";RESP$:IFRESP$<>"rima"THENGOSUB160:PRINT"\ Ummm, no.":GOTO370:ELSEPLAY"e9a5":PRINT"B Me gusta!":PRINT"      _"
380 PRINT"En otono cuando caen las     hojas,":PRINT"Coge tinta, pluma y _____.":PRINT
390 INPUT"Que palabra falta";RESP$:IFRESP$<>"anota"THENGOSUB160:PRINT"\ No,no,no.":GOTO390:ELSEPLAY"e9a5":PRINT"B Que bonito!":PRINT
400 PRINT"Mande un mensaje a los peces,Les dije:Esto es lo que me  apetece.":PRINT:PRINT"De los pececitos del mar,    La respuesta no se hizo      _______.":PRINT
410 INPUT"Que palabra falta";RESP$:IFRESP$<>"esperar"THENGOSUB160:PRINT"\ Creo que no.":GOTO410:ELSEPLAY"e9a5":PRINT"B Ideal!":PRINT
420 PRINT"Y la respuesta de los pececi-tos fue,":PRINT"No lo podemos hacer,Pues   ":PRINT"Yo les volvi a comentar,     Debeis hacer mi ________.":PRINT
430 INPUT"Que palabra falta";RESP$:IFRESP$<>"voluntad"THENGOSUB160:PRINT"\ No se,no se.":GOTO430:ELSEPLAY"e9a5":PRINT"B Bingo!":PRINT
440 PRINT"Los peces responden sonriendoVaya,menudo temperamento.  ":PRINT"Se lo dije una vez,se lo dijedos,":PRINT"Me hicieron caso? Pues __!":PRINT
450 INPUT"Que palabra falta";RESP$:IFRESP$<>"no"THENGOSUB160:PRINT"\ No se,no se.":GOTO450:ELSEPLAY"e9a5":PRINT"B Si, muy bien.":PRINT
460 PRINT"Cogi una olla grande y nueva,Muy adecuada para la tarea.  ":PRINT"Mi corazon salto,dio un golpeYo llene la olla hasta el    _____.":PRINT
470 INPUT"Que palabra falta";RESP$:IFRESP$<>"borde"THENGOSUB160:PRINT"\ Ummmmm...":GOTO470:ELSEPLAY"e9a5":PRINT"B Me lo quedo!":PRINT
480 PRINT"Luego alguien me exclama,    Los pececitos estan en la   cama.":PRINT:PRINT"Yo le dije bien clarito:     Que se levanten ahora _____":PRINT
490 INPUT"Que palabra falta";RESP$:IFRESP$<>"mismo"THENGOSUB160:PRINT"\ NO!":GOTO490:ELSEPLAY"e9a5":PRINT"B Perfecto!":PRINT
500 PRINT"Con voz alta y clara,":PRINT"Se lo dije a la ____.":PRINT:PRINT"Pero rigido y orgulloso dijo:No hace falta tanto grito.":PRINT
510 INPUT"Que palabra falta";RESP$:IFRESP$<>"cara"THENGOSUB160:PRINT"\ Uf!":GOTO510:ELSEPLAY"e9a5":PRINT"B Que maravilla!":PRINT
520 PRINT"Y orgulloso y rigido volvio adecir:":PRINT"Los despertare,Si...":PRINT:PRINT"Cogi un sacacorchos de un    estante,":PRINT"Y fui a levantarlos en ese   mismo ________.":PRINT
530 INPUT"Que palabra falta";RESP$:IFRESP$<>"instante"THENGOSUB160:PRINT"\ Aggf!":GOTO530:ELSEPLAY"e9a5":PRINT"B Que metrica!":PRINT
540 PRINT"Y al encontrar la puerta     cerrada,":PRINT"Llamaba, tiraba y ________.  "
550 INPUT"Que palabra falta";RESP$:IFRESP$<>"empujaba"THENGOSUB160:PRINT"\ Queee!?":GOTO550:ELSEPLAY"e9a5":PRINT"B Fantastico!":PRINT
560 PRINT"La puerta no se abria,":PRINT"Gire el pomo, hasta...":PRINT:PRINT:PRINT:PRINT"Hubo una larga pausa.":PRINT"WEso es todo?Wpregunto AliciaWSi.Adios.":PRINT"WAdios.Hasta la proxima WdijoAlicia tendiendole la mano."
570 PRINT"WNo creo que pueda reconocer-te. Eres como el resto de la genteWdijo HUMPTY DUMPTY dan-dole un dedo para el apreton de manos.":PRINT"WNo recordaras mi cara?":GOSUB30:PRINT"WEse es el problema.Tu cara  es como la del resto de la"
580 PRINT"de la gente:2 ojos,una nariz en medio,la boca debajo,...  Si tuvieses los ojos en el   mismo lado o la boca arriba, ayudaria.":PRINT"WPero estaria muy fea.":PRINT"WNunca lo sabras hasta que   lo intentesWdijo cerrando losojos HUMPTY DUMPTY."
590 PRINT"Alicia espero 1 minuto por sidecia algo mas,pero continuo con los ojos cerrados y sin  prestarla atencion alguna.   WAdios Wdijo Alicia de nuevo.No obtuvo respuesta,asi que  se fue diciendose a si misma:WDe las  INSATISFACTORIAS
600 PRINT"personasWdijo recreadonse en la larga palabrejaWque he co-nocido,esta es...":GOSUB30:PRINT"Y antes de poder acabar la   frase se oyo un estruendo en todo el bosque. Alicia volviosobre sus pasos y se encontroal pobre HUMPTY DUMPTY en el"
610 PRINT"suelo,roto como un puzzle.   ":PRINT"(AYUDA A ALICIA A RECONSTRUIR A HUMPTY DUMPTY TRAS CAERSE)":GOSUB30:CLS:X=4:Y=2:B=6144:L=32:R0=0:R1=0:R2=0:R3=0:RA=0:RB=0
620 PRINT"/WW.        /WW. Asi era
630 PRINT"VV Asi    VV HUMPTY
640 PRINT"V V esta   V V DUMPTY
650 PRINT";WW; ahora  ;WW; antes":LOCATE1,10:PRINT"Mueve los cursores para":PRINT"recomponer a HUMPTY DUMPTY."
660 FORVP=0TO10
670 R0=RND(-TIME)*4:R1=RND(-TIME)*4:R2=RND(-TIME)*4:R3=RND(-TIME)*4
680 RA=VPEEK(B+L*R1+R0+2):RB=VPEEK(B+L*R3+R2+2):IFRA=32ORRB=32THENGOTO670
690 VPOKE(B+L*R1+R0+2),RB:VPOKE(B+L*R3+R2+2),RA
700 NEXTVP:R0=0:R1=0
710 D=STICK(0)
720 IF D=1 AND Y>0 THEN Y=Y-1:VPOKE(B+L*(Y+1)+X),VPEEK(B+L*Y+X):VPOKE(B+L*Y+X),32:BEEP
730 IF D=5 AND Y<3 THEN Y=Y+1:VPOKE(B+L*(Y-1)+X),VPEEK(B+L*Y+X):VPOKE(B+L*Y+X),32:BEEP
740 IF D=3 AND X<5 THEN X=X+1:VPOKE(B+L*Y+X-1),VPEEK(B+L*Y+X):VPOKE(B+L*Y+X),32:BEEP
750 IF D=7 AND X>2 THEN X=X-1:VPOKE(B+L*Y+X+1),VPEEK(B+L*Y+X):VPOKE(B+L*Y+X),32:BEEP
760 REM *****comprobar dibujo******
770 IFVPEEK(B+2)=47ANDVPEEK(B+3)=23ANDVPEEK(B+4)=23ANDVPEEK(B+5)=46ANDVPEEK(B+34)=22ANDVPEEK(B+35)=188ANDVPEEK(B+36)=188ANDVPEEK(B+37)=22THENR0=1ELSER0=0
780 IFVPEEK(B+66)=22ANDVPEEK(B+67)=213ANDVPEEK(B+68)=32ANDVPEEK(B+69)=22ANDVPEEK(B+98)=59ANDVPEEK(B+99)=23ANDVPEEK(B+100)=23ANDVPEEK(B+101)=59THENR1=1ELSER1=0
790 IFR0=1ANDR1=1THENGOTO810
800 GOTO710
810 PRINT:PRINT"       Conseguido !!!":GOSUB30:PRINT:PRINT:PRINT"WGracias,muchas gracias! Me  has dejado como nuevo!":PRINT"WDe nada,pero no cree que    estaria mejor en el suelo.   WUmmm,puede ser. Tengo que   pensarlo.Buenos dias.":GOSUB30
820 PRINT:PRINT"Alicia se despidio otra vez yalli dejo a HUMPTY DUMPTY    reflexionando sobre el tema, rascandose la barbilla con undedo.":PLAY"v14","v14":GOSUB30
830 REM  LEON Y UNICORNIO 
840 GOSUB60:COLOR15,1:LOCATE1,11:PRINT" EL LEON Y EL UNICORNIO ":GOSUB30:GOSUB60:LOCATE0,0:COLOR11,1:PRINT"De repente el bosque se llenode soldados.Alicia se refugiotras un arbol porque cada vezhabia mas y mas y temia que  la atropellasen."
850 PRINT"Por suerte llego a un claro  donde estaba sentado el REY  BLANCO escribiendo en su     libro de notas.":PRINT"WLos he enviado a todos. Te  encontraste con alguno?W le  pregunto a Alicia.":PRINT"WCon miles,en realidad."
860 PRINT"W4.207 exactamente Wdijo el  REY leyendo el libroW.Pero nohe podido mandar a todos mis caballos.Necesito al menos ? para el juego.":PRINT
870 INPUT"Cuantos caballos necesita el REY:1,2,3...";RESP$:IFRESP$<>"2"THENGOSUB160:PRINT"\ No.Pista: piensa en el aje-drez.":GOTO870:ELSEPLAY"e9a5":PRINT"B Exacto,como en el ajedrez.":PRINT
880 PRINT"WTambien mande 2 mensajeros  a la ciudad.Dime si ves algu-no en el camino.":PRINT"WNo veo a nadie.":PRINT"WVaya,menuda vista tienes,vesa NADIE.Debe de estar lejisi-mos pues yo no lo veo.":PRINT"Alicia no comprendio lo que"
890 PRINT"el REY dijo y siguio mirando el camino.":PRINT"WYa veo a alguien venir.Pero va muy despacio y anda muy   raro.":PRINT"WEs que es un mensajero Anglo-Sajon.Su nombre es HAIGHA laliebre.Me gusta tener 2. Uno para ir y otro para venir.El"
900 PRINT"otro se llama HATTA, el som- brerero.":GOSUB30:PRINT"La liebre llego hasta el REY moviendo impacientemente los brazos y aquel le pregunto:  WHas adelantado a alguien porel camino?":PRINT"WHa nadie Wcontesto HAIGHA.  WTenia razon la joven."
910 PRINT"Traes noticias de la ciudad? WSe las susurrare al oido.   La liebre se acerco al REY y le grito al oido:":PRINT"WSe estan peleando,otra vez!!WA eso le llamas susurrar!?  Casi me vuelas la cabeza!    WQuienes se estan peleando"
920 PRINT"otra vez? Wpregunto Alicia.  WEl LEON y el UNICORNIO, por supuestoWdijo el REY.":PRINT"WPor la corona?":PRINT"WClaro!.Y lo mejor de todo esque la corona es mia Wdijo   sonriente el Monarca.":GOSUB30:PRINT:PRINT"De repete le vino a Alicia"
930 PRINT"a la cabeza la letra de la   antigua cancion:":PRINT:PRINT:PRINT"El LEON y el UNICORNIO se    peleaban por la corona,"::PRINT:PRINT"El LEON golpeo al UNICORNIO  por toda la ciudad,":PRINT:PRINT"Unos les daban pan blanco y  otros pan de cebolla,
940 PRINT:PRINT"Y otros con sus tambores les echaron sin ______.":PRINT
950 INPUT"Que palabra falta";RESP$:IFRESP$<>"piedad"THENGOSUB160:PRINT"\ No exactamente.":GOTO950:ELSEPLAY"e9a5":PRINT"B Muy bien.":PRINT
960 PRINT"Mientras pensaba en la rima  echaron todos a correr hacia la ciudad y Alicia los siguiocon apuros. Pararon frente a una gran multitud que obser- vaba la pelea,estilo boxeo.  Se pusieron al lado de HATTA que estaba bebiendo TE y co-"
970 PRINT"miendo pan con mantequilla.  WQuien va ganando?W pregunto el REY.":PRINT"WLos dos han caido 87 vecesW dijo HATTA enforzandose en   tragar antes el pan.":PRINT"WSupongo que pronto traeran  el panWdijo Alicia."
980 PRINT"WYo ya cogi un poquitoW dijo HATTA.":GOSUB30:PRINT"Entonces paro la pelea y el  REY decreto,por hoy,finaliza-da la lucha y mando a HATTA  que ordenase redoblar los    tambores, que fue brincando  como un saltamontes."
990 PRINT"En ese momento se acerco el  UNICORNIO y le dijo al REY:  WCasi gano,eh?":PRINT"WPor poco,si. Pero creo que  clavarle el cuerno sobrabaW  dijo el REY.":PRINT"WNi siquiera lo notoW dijo   despreocupado el UNICORNIO.  ":PRINT
1000 INPUT"A que pais del Reino Unido   crees tu que hace referencia el UNICORNIO";RESP$:IFRESP$<>"Escocia"THENGOSUB160:PRINT"\ No es correcto.":GOTO1000:ELSEPLAY"e9a5":PRINT"B Correcto!":PRINT
1010 PRINT"WPero esto que es?!Wdijo el  UNICORNIO cuando se dio cuen-ta de la_presencia de Alicia.WUna  nina.Lo encontramos hoyy es real como la vida misma.WCrei que eran mounstruos de cuento.Esta viva?":PRINT"WIncluso hablaWdijo HAIGHA."
1020 PRINT"WDi algoWle ordeno el UNICOR-NIO a Alicia.":PRINT"WSabias que yo tambien pensa-ba que los unicornios eran   criaturas de cuento? Nunca viuno vivo antes!":PRINT"WBueno,ahora que nos hemos   visto el uno al otro, si tu"
1030 PRINT"crees en mi,yo creere en ti. Trato hecho?":PRINT:INPUT"si/no";RESP$:IFRESP$<>"si"THENGOSUB60:GOSUB180:ELSEPRINT:PRINT"WTrato hechoWdijo Alicia.":PRINT"WBien,y ahora saca el pastel de ciruela que no quiero panWle dijo el UNICORNIO al REY."
1040 PRINT"-Como no,como no.Abre el sacoHAIHGA,rapido.":PRINT"HAIGA le dio el pastel a Ali-cia para que lo sostuviera, ysaco del saco un plato y un  cuchillo como por arte de   magia.":PRINT"El LEON se unio al grupo,can-sado y adormilado.":PRINT
1050 INPUT"A que pais del Reino Unido   crees tu que hace referencia el LEON";RESP$:IFRESP$<>"Inglaterra"THENGOSUB160:PRINT"\ No es correcto.":GOTO1050:ELSEPLAY"e9a5":PRINT"B Bien!":PRINT
1060 PRINT"WQue es esto?W dijo el LEON  con voz profunda mirando a   Alicia.":PRINT"WIntenta adivinarloWdijo el  UNICORNIO.":PRINT"WMineral,vegetal o animal?   WEs un Mounstruo de fabula!  WPues Mounstruo, reparte el  pastel.Y vosotros sentaos a"
1070 PRINT"mi ladoWdijo el LEON al UNI- CORNIO y al REY.":PRINT"El REY quedo entre ambos, es-cuchando temeroso mientras   discutian por quien seria el vencedor al final.Alicia sen-tada junto a un arroyo inten-taba cortar el pastel, pero"
1080 PRINT"los trozos volvian a unirse. WLos pasteles del Espejo se  reparten primero y luego se  cortanWdijo el Unicornio.":GOSUB30:PRINT"Le hizo caso y llevo el platocon el pastel donde estaban  sentados y cuando llego El   solo se dividio. Todos co-
1090 PRINT"gieron su parte y Alicia vol-vio junto al arroyo.":PRINT"WMonstruo!, no has cogido tu parteWgrito el LEONW. No te  gusta el pastel?":PRINT"Y antes de poder contestar   empezaron a resonar los tam- bores,y tan alto que tapan-"
1100 PRINT"dose los oidos cruzo el arro-yo tratando de huir.":PRINT:PRINT"            ***":PRINT:PRINT"Vio al LEON y al UNICORNIO   levantarse enfadados por la  interrupcion de su merienda  antes de arrodillarse con lasmanos en la cabeza,pensando:"
1110 GOSUB30:PRINT:PRINT"Si este estruendo no los    echa de la ciudad, nada lo   hara.":GOSUB30
1120 REM  DE INVENCION PRO 
1130 GOSUB60:COLOR15,1:LOCATE3,11:PRINT" DE INVENCION PROPIA ":GOSUB30:GOSUB60:LOCATE0,0:COLOR14,1:PRINT"Cuando se levanto no vio a   nadie._Supo que no habia sidoun sueno porque el plato de  la tarta estaba a su lado. Y de repente:"
1140 PRINT"WAlto,alto! Jaque!W grito un jinete de armadura carmesi.  Su caballo paro en seco y el CABALLERO cayo por delante.Selevanto y dijo:":PRINT"WEres mi prisionera.":PRINT
1150 PRINT"A quien daba jaque el CABA-  LLERO ROJO:":PRINT"1.A Alicia":PRINT"2.Al Rey Blanco":PRINT"3.A la Dama Blanca":PRINT"4.Al Rey negro":PRINT:INPUT"Elige numero";RESP$:IFRESP$<>"2"THENGOSUB160:PRINT"\Pues No!":PRINT:GOTO1150:ELSEPLAY"e9a5"
1160 PRINT"B Correcto. De hecho,solo se puede dar jaque al Rey, y co-mo el Caballero es carmesi   tiene que ser al Rey Blanco.":PRINT:PRINT"El caballero se subio a su   montura y de repente se oyo: WAlto,jaque!":PRINT"Era el CABALLERO BLANCO.Tam-"
1170 PRINT"bien su caballo lo lanzo por los aires al llegar junto a  Alicia.":PRINT"WEspera,es mi prisionera.    WYa no,yo la rescate.":PRINT"WBueno, tendremos que luchar por ella.":PRINT"WRespetaras las normas de    combate?":PRINT"WPor supuesto."
1180 GOSUB30:PRINT"Empezo la lucha.Alicia se es-condio tras un arbol para    protegerse de los golpes que volaban y pensaba:Cuales se-ran esas reglas.Lo unico que veo es que cuando fallan el  golpe se caen,y si no, tiran al otro.Y los caballos ni se"
1190 PRINT"inmutan,paciendo tranquilos, sin moverse.":PRINT"La lucha termino cuando ambosfallaron el golpe y cayeron  de cabeza al suelo. Se levan-taron,se dieron la mano y el CABALLERO ROJO monto y se fueal galope.":PRINT"WGloriosa victoria, verdad?W
1200 PRINT"dijo el CABALLERO BLANCO.    WNo estoy segura. Ademas, no quiero ser prisionera de na- die.Quiero ser Reina.":GOSUB30:PRINT"WY lo seras cuando cruces el siguiente arroyo. Y yo te es-coltare hasta el final del   bosque.Mi ultimo movimiento"
1210 PRINT"antes de volver atras.":PRINT:PRINT"Con la forma de que letra se suele decir que se mueve un  Caballo en ajedrez?":PRINT
1220 INPUT "A,B,C,...";RESP$:IFRESP$<>"L"ANDRESP$<>"l"THENGOSUB160:PRINT"\ No. Esa no es.":GOTO1220:ELSEPLAY"e9a5":PRINT"B Muy bien.Acertaste.":PRINT
1230 PRINT"Dandole las gracias,Alicia leayudo a quitarse el casco.Su armadura era de laton y no seajustaba a su cuerpo. Llevabael caballo cargado de cosas. WMira que invento. Una caja  para guardar ropa y comida.  El agujero esta abajo para"
1240 PRINT"protergerlos de la lluvia.   WPero se caeran al suelo.    WAhora que lo dices... Bueno,pues la dejare en este arbol para que las abejas hagan un panal y asi tendre miel!     WPero ya lleva una atada a lasilla.":GOSUB30
1250 PRINT"WSi, pero no se ha acercado  ninguna abeja.Por si acaso hepuesto trampas para ratones. No se quien espanta a quien. Los ratones a las abejas o alreves.":PRINT"WPero los ratones no van por encima de los caballos."
1260 PRINT"WHay que estar preparado paratodo.Por eso mi caballo llevaesas tobilleras. Para prote- gerle de los mordiscos de lostiburones. Es otro de mis in-ventos. Bueno, te llevare al final del bosque. Para que esese plato?":PRINT
1270 PRINT"WEra de una tartaW contesto  Alicia.":GOSUB30
1280 REM  FIN CARGA 3 
1290 GOSUB60:LOCATE0,8:COLOR8,1,1:PRINT" Has llegado al final de la    TERCERA CARGA del juego.":GOSUB1390:PRINT:PRINT:PRINT" Clave para la Cuarta Carga:
1300 PRINT:PRINT"    XWWWWWWWWWWWWWWWWY":PRINT"    V yosoyelhuevo V":PRINT"    ZWWWWWWWWWWWWWWWW[":GOSUB1390:GOSUB1450:GOSUB30:GOSUB30:RUN
1310 REM  JOESG PRESENTA 
1320 LOCATE0,7:PRINT"          ":PRINT"              ":PRINT"                ":PRINT"              ":PRINT"              ":PRINT"         ":PRINT"             PRESENTA:":PRINT:PRINT
1330 PRINT"Para el concurso de KONAMITO":PRINT"   de MSX-BASIC 2012-2013":RETURN
1340 REM  TITULO 
1350 GOSUB60:PRINT"  oo ooo       Carga":PRINT"  ooooo            #3":PRINT"  oooo     ":PRINT"  oooo   ^  ":PRINT"   oooo  ZW[ ":PRINT"     oo WW   WW":PRINT"           ":PRINT"  WWWWWWWWWWWWWWW
1360 PRINT"           '   '         ":PRINT"    A TRAVES DEL ESPEJO  ":PRINT"        y de lo que      ":PRINT"        A L I C I A      ":PRINT"     se encontro alli    ":PRINT:PRINT" WWWWWWWWWWWWWWWWWWWWWWW"
1370 PRINT:PRINT:PRINT:PRINT"FFFFFF Pulsa Espacio FFFFFF"
1380 RETURN
1390 REM  MUSICA TITULO 
1400 PLAY"v14","V14","V12"
1410 PLAY"g8r8c8r8a8r8d8r8g8r8c8r8a8r8d8r8","d8r8r8r8c8r8r8r8r8r8r8r8d8"
1420 PLAY"g8r8c8r8a8r8d8r8g8r8c8r8a8r8d8r8","d8r8r8r8c8r8r8r8r8r8r8r8d8"
1430 PLAY"g8r8c8r8a8r8d8r8g8r8c8r8a8r8d8r8","d8r8r8r8c8r8r8r8r8r8r8r8d8","b8r8r8r8r8r8r8r8b8"
1440 PLAY"g8r8c8r8a8r8d8r8g8r8c8r8a8r8d8r8","d8r8r8r8c8r8r8r8r8r8r8r8d8","c8r8r8r8r8r8r8r8b8":RETURN
1450 REM  FIN MUSICA 
1460 PLAY"g","d","b":RETURN
